home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / Palettes / TabMatrixPalette1.5 / TabMatrixPalette.m < prev    next >
Text File  |  1995-06-12  |  1KB  |  46 lines
  1.  
  2.  
  3. #import "TabMatrixPalette.h"
  4. #import "UITabActionCell.subproj/UITabActionCell.h"
  5.  
  6. @implementation  TabMatrixPalette
  7.  
  8. - finishInstantiate
  9. {
  10.     NXRect              frameRect;
  11.     Matrix             *newMatrix;
  12.  
  13.     [matrix getFrame:&frameRect];
  14.  
  15.     newMatrix =
  16.         [[Matrix allocFromZone:[self zone]]
  17.         initFrame:&frameRect
  18.         mode:NX_RADIOMODE
  19.         prototype:[[UITabActionCell allocFromZone:[self zone]] initTextCell:"Folder Tab"]
  20.         numRows:1
  21.         numCols:2];
  22.  
  23.     [[matrix superview] replaceSubview:matrix with:newMatrix];
  24.  
  25.     [matrix free];
  26.  
  27.     matrix = newMatrix;
  28.  
  29.  // set the background gray of tabMatrix to NX_DKGRAY 
  30.     [matrix setBackgroundGray:NX_DKGRAY];
  31.  
  32.  // set the autosizing and autoscrolling attributes of the matrix 
  33.     [matrix setAutosizing:NX_WIDTHSIZABLE];
  34.     [matrix setAutoscroll:YES];
  35.  
  36.  // size tabMatrix to its cells, resize matrix so that nice NX_DKGRAY border
  37.  // frames tabs, and display it 
  38.     [matrix sizeToFit];
  39.     [matrix setAutosizeCells:YES];
  40.     [matrix sizeBy:0.0 :4.0];
  41.     [matrix display];    
  42.  
  43.     return self;
  44. }
  45. @end
  46.